home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Demos / DEMOS.ARC / -COLOR CHART (.txt) < prev    next >
Commodore BASIC  |  2019-04-13  |  639b  |  14 lines
  1. 30 PRINT"[147][142]"
  2. 40 FORI=49152TO49188:READA:POKEI,A:NEXT:POKE53280,11
  3. 50 PRINT"[151][147]";:A$="                                        "
  4. 60 FORI=1TO24:PRINTA$;:NEXT:PRINT"                                       "
  5. 70 POKE2023,160
  6. 80 FORI=0TO15:FORJ=0TO15:P=1200+(40*I)+J:POKEP+54272,J:POKEP,90:NEXTJ,I
  7. 85 PRINT"[151]COLORCHART"
  8. 90 PRINT"THIS CHART":PRINT"SHOW ALL 256":PRINT"COMBINATIONS"
  9. 95 PRINT"OF COLORS.":SYS12*4096
  10. 97 GOTO97
  11. 100 DATA169,90,133,251,169,0,141,33,208,162,15,120,173,17,208,48
  12. 105 DATA251,173,18,208
  13. 110 DATA197,251,208,249,238,33,208,24,105,8,133,251,202,16,233,48,219
  14.